CAADiameters_UranusSemidiameterB <-
function(Delta){
.Call("CAADiameters_UranusSemidiameterB", Delta)
}
